object Hotove1Rpt: THotove1Rpt Left = 260 Top = 246 Width = 834 Height = 665 Caption = 'Kniha j�zd' Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False Scaled = False PixelsPerInch = 96 TextHeight = 13 object QuickRep1: TQuickRep Left = 8 Top = 8 Width = 794 Height = 1123 Frame.Color = clBlack Frame.DrawTop = False Frame.DrawBottom = False Frame.DrawLeft = False Frame.DrawRight = False DataSet = ADODataSet1 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] Functions.Strings = ( 'PAGENUMBER' 'COLUMNNUMBER' 'REPORTTITLE' 'BUSSKM' 'PRIVKM' 'QRSTRINGSBAND1') Functions.DATA = ( '0' '0' #39#39 '0' '0' #39#39) Options = [FirstPageHeader, LastPageFooter] Page.Columns = 1 Page.Orientation = poPortrait Page.PaperSize = A4 Page.Values = ( 100.000000000000000000 2970.000000000000000000 100.000000000000000000 2100.000000000000000000 100.000000000000000000 100.000000000000000000 0.000000000000000000) PrinterSettings.Copies = 1 PrinterSettings.Duplex = False PrinterSettings.FirstPage = 0 PrinterSettings.LastPage = 0 PrinterSettings.OutputBin = Auto PrintIfEmpty = True SnapToGrid = True Units = MM Zoom = 100 object QRBand1: TQRBand Left = 38 Top = 38 Width = 718 Height = 11 Frame.Color = clBlack Frame.DrawTop = False Frame.DrawBottom = False Frame.DrawLeft = False Frame.DrawRight = False AlignToBottom = False Color = clWhite ForceNewColumn = False ForceNewPage = True Size.Values = ( 29.104166666666670000 1899.708333333333000000) BandType = rbTitle end object QRBand2: TQRBand Left = 38 Top = 225 Width = 718 Height = 0 Frame.Color = clBlack Frame.DrawTop = False Frame.DrawBottom = False Frame.DrawLeft = False Frame.DrawRight = False Frame.Style = psDot AlignToBottom = False Color = clWhite ForceNewColumn = False ForceNewPage = False Size.Values = ( 0.000000000000000000 1899.708333333333000000) BandType = rbDetail end object QRBand3: TQRBand Left = 38 Top = 225 Width = 718 Height = 32 Frame.Color = clBlack Frame.DrawTop = True Frame.DrawBottom = False Frame.DrawLeft = False Frame.DrawRight = False AlignToBottom = False Color = clWhite ForceNewColumn = False ForceNewPage = False Size.Values = ( 84.666666666666670000 1899.708333333333000000) BandType = rbGroupFooter object QRExpr4: TQRExpr Left = 72 Top = 8 Width = 94 Height = 17 Frame.Color = clBlack Frame.DrawTop = False Frame.DrawBottom = False Frame.DrawLeft = False Frame.DrawRight = False Size.Values = ( 44.979166666666700000 190.500000000000000000 21.166666666666700000 248.708333333333000000) Alignment = taLeftJustify AlignToBand = False AutoSize = True AutoStretch = False Color = clWhite ResetAfterPrint = True Transparent = False WordWrap = True Expression = 'SUM(kccelkem)' Mask = '# ###.00 K�' FontSize = 10 end object QRLabel11: TQRLabel Left = 16 Top = 8 Width = 45 Height = 17 Frame.Color = clBlack Frame.DrawTop = False Frame.DrawBottom = False Frame.DrawLeft = False Frame.DrawRight = False Size.Values = ( 44.979166666666700000 42.333333333333300000 21.166666666666700000 119.062500000000000000) Alignment = taLeftJustify AlignToBand = False AutoSize = True AutoStretch = False Caption = 'Celkem' Color = clWhite Transparent = False WordWrap = True FontSize = 10 end end object QRBand4: TQRBand Left = 38 Top = 257 Width = 718 Height = 32 Frame.Color = clBlack Frame.DrawTop = True Frame.DrawBottom = False Frame.DrawLeft = False Frame.DrawRight = False AlignToBottom = False Color = clWhite ForceNewColumn = False ForceNewPage = False Size.Values = ( 84.666666666666670000 1899.708333333333000000) BandType = rbPageFooter object QRLabel18: TQRLabel Left = 0 Top = 8 Width = 260 Height = 17 Frame.Color = clBlack Frame.DrawTop = False Frame.DrawBottom = False Frame.DrawLeft = False Frame.DrawRight = False Size.Values = ( 44.979166666666700000 0.000000000000000000 21.166666666666700000 687.916666666667000000) Alignment = taLeftJustify AlignToBand = False AutoSize = True AutoStretch = False Caption = 'Vyti�t�no programem Dispatcher 3, HI Software s.r.o.' Color = clWhite Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False Transparent = False WordWrap = True FontSize = 8 end object QRSysData1: TQRSysData Left = 608 Top = 8 Width = 105 Height = 17 Frame.Color = clBlack Frame.DrawTop = False Frame.DrawBottom = False Frame.DrawLeft = False Frame.DrawRight = False Size.Values = ( 44.979166666666700000 1608.666666666670000000 21.166666666666700000 277.812500000000000000) Alignment = taRightJustify AlignToBand = False AutoSize = False Color = clWhite Data = qrsPageNumber Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False Text = 'Strana' Transparent = False FontSize = 8 end end object QRBand5: TQRBand Left = 38 Top = 225 Width = 718 Height = 0 Frame.Color = clBlack Frame.DrawTop = False Frame.DrawBottom = False Frame.DrawLeft = False Frame.DrawRight = False AlignToBottom = False Color = clWhite ForceNewColumn = False ForceNewPage = False Size.Values = ( 0.000000000000000000 1899.708333333333000000) BandType = rbGroupFooter end object QRGroup1: TQRGroup Left = 38 Top = 49 Width = 718 Height = 112 Frame.Color = clBlack Frame.DrawTop = False Frame.DrawBottom = False Frame.DrawLeft = False Frame.DrawRight = False AlignToBottom = False Color = clWhite Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] ForceNewColumn = False ForceNewPage = True ParentFont = False Size.Values = ( 296.333333333333400000 1899.708333333333000000) Expression = 'ADODataSet1.RozTrasyKlic' FooterBand = QRBand3 Master = QuickRep1 ReprintOnNewPage = False object QRShape4: TQRShape Left = 24 Top = 80 Width = 409 Height = 25 Frame.Color = clBlack Frame.DrawTop = False Frame.DrawBottom = False Frame.DrawLeft = False Frame.DrawRight = False Size.Values = ( 66.145833333333300000 63.500000000000000000 211.666666666667000000 1082.145833333330000000) Shape = qrsRectangle end object QRShape3: TQRShape Left = 24 Top = 56 Width = 409 Height = 25 Frame.Color = clBlack Frame.DrawTop = False Frame.DrawBottom = False Frame.DrawLeft = False Frame.DrawRight = False Size.Values = ( 66.145833333333300000 63.500000000000000000 148.166666666667000000 1082.145833333330000000) Shape = qrsRectangle end object QRShape2: TQRShape Left = 24 Top = 32 Width = 409 Height = 25 Frame.Color = clBlack Frame.DrawTop = False Frame.DrawBottom = False Frame.DrawLeft = False Frame.DrawRight = False Size.Values = ( 66.145833333333300000 63.500000000000000000 84.666666666666700000 1082.145833333330000000) Shape = qrsRectangle end object QRDBText8: TQRDBText Left = 104 Top = 36 Width = 61 Height = 20 Frame.Color = clBlack Frame.DrawTop = False Frame.DrawBottom = False Frame.DrawLeft = False Frame.DrawRight = False Size.Values = ( 52.916666666666700000 275.166666666667000000 95.250000000000000000 161.395833333333000000) Alignment = taLeftJustify AlignToBand = False AutoSize = True AutoStretch = False Color = clWhite DataSet = ADODataSet1 DataField = 'naz_trasy' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False Transparent = False WordWrap = True FontSize = 10 end object QRLabel6: TQRLabel Left = 56 Top = 62 Width = 32 Height = 17 Frame.Color = clBlack Frame.DrawTop = False Frame.DrawBottom = False Frame.DrawLeft = False Frame.DrawRight = False Size.Values = ( 44.979166666666700000 148.166666666667000000 164.041666666667000000 84.666666666666700000) Alignment = taLeftJustify AlignToBand = False AutoSize = True AutoStretch = False Caption = '�idi�:' Color = clWhite Transparent = False WordWrap = True FontSize = 9 end object QRDBText17: TQRDBText Left = 104 Top = 62 Width = 34 Height = 17 Frame.Color = clBlack Frame.DrawTop = False Frame.DrawBottom = False Frame.DrawLeft = False Frame.DrawRight = False Size.Values = ( 44.979166666666700000 275.166666666667000000 164.041666666667000000 89.958333333333300000) Alignment = taLeftJustify AlignToBand = False AutoSize = True AutoStretch = False Color = clWhite DataSet = ADODataSet1 DataField = 'driver' Transparent = False WordWrap = True FontSize = 9 end object QRLabel4: TQRLabel Left = 56 Top = 85 Width = 30 Height = 17 Frame.Color = clBlack Frame.DrawTop = False Frame.DrawBottom = False Frame.DrawLeft = False Frame.DrawRight = False Size.Values = ( 44.979166666666700000 148.166666666667000000 224.895833333333000000 79.375000000000000000) Alignment = taLeftJustify AlignToBand = False AutoSize = True AutoStretch = False Caption = 'Auto:' Color = clWhite Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False Transparent = False WordWrap = True FontSize = 9 end object QRDBText10: TQRDBText Left = 104 Top = 85 Width = 21 Height = 17 Frame.Color = clBlack Frame.DrawTop = False Frame.DrawBottom = False Frame.DrawLeft = False Frame.DrawRight = False Size.Values = ( 44.979166666666700000 275.166666666667000000 224.895833333333000000 55.562500000000000000) Alignment = taLeftJustify AlignToBand = False AutoSize = True AutoStretch = False Color = clWhite DataSet = ADODataSet1 DataField = 'car' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False Transparent = False WordWrap = True FontSize = 10 end object QRLabel3: TQRLabel Left = 56 Top = 36 Width = 40 Height = 20 Frame.Color = clBlack Frame.DrawTop = False Frame.DrawBottom = False Frame.DrawLeft = False Frame.DrawRight = False Size.Values = ( 52.916666666666700000 148.166666666667000000 95.250000000000000000 105.833333333333000000) Alignment = taLeftJustify AlignToBand = False AutoSize = True AutoStretch = False Caption = 'Trasa:' Color = clWhite Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False Transparent = False WordWrap = True FontSize = 10 end object QRDBText1: TQRDBText Left = 611 Top = 62 Width = 98 Height = 17 Frame.Color = clBlack Frame.DrawTop = False Frame.DrawBottom = False Frame.DrawLeft = False Frame.DrawRight = False Size.Values = ( 44.979166666666700000 1616.604166666670000000 164.041666666667000000 259.291666666667000000) Alignment = taRightJustify AlignToBand = False AutoSize = True AutoStretch = False Color = clWhite DataSet = ADODataSet1 DataField = 'JmenoRozvozu' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False Transparent = False WordWrap = True FontSize = 10 end object QRLabel2: TQRLabel Left = 0 Top = 8 Width = 54 Height = 17 Frame.Color = clBlack Frame.DrawTop = False Frame.DrawBottom = False Frame.DrawLeft = False Frame.DrawRight = False Size.Values = ( 44.979166666666700000 0.000000000000000000 21.166666666666700000 142.875000000000000000) Alignment = taLeftJustify AlignToBand = False AutoSize = True AutoStretch = False Caption = '[:Firma:]' Color = clWhite Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False Transparent = False WordWrap = True FontSize = 10 end object QRShape1: TQRShape Left = 8 Top = 27 Width = 716 Height = 3 Frame.Color = clBlack Frame.DrawTop = False Frame.DrawBottom = False Frame.DrawLeft = False Frame.DrawRight = False Size.Values = ( 7.937500000000000000 21.166666666666700000 71.437500000000000000 1894.416666666670000000) Pen.Color = clNavy Pen.Width = 3 Shape = qrsHorLine end object QRLabel1: TQRLabel Left = 595 Top = 8 Width = 120 Height = 17 Frame.Color = clBlack Frame.DrawTop = False Frame.DrawBottom = False Frame.DrawLeft = False Frame.DrawRight = False Size.Values = ( 44.979166666666700000 1574.270833333330000000 21.166666666666700000 317.500000000000000000) Alignment = taRightJustify AlignToBand = False AutoSize = True AutoStretch = False Caption = 'Inkasov�no hotov�' Color = clWhite Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False Transparent = False WordWrap = True FontSize = 10 end end object QRGroup2: TQRGroup Left = 38 Top = 161 Width = 718 Height = 64 Frame.Color = clBlack Frame.DrawTop = True Frame.DrawBottom = True Frame.DrawLeft = True Frame.DrawRight = True AlignToBottom = False Color = clWhite ForceNewColumn = False ForceNewPage = False Size.Values = ( 169.333333333333300000 1899.708333333333000000) Expression = 'ADODataSet1.Firma' FooterBand = QRBand5 Master = QuickRep1 ReprintOnNewPage = False object QRDBText2: TQRDBText Left = 16 Top = 8 Width = 42 Height = 17 Frame.Color = clBlack Frame.DrawTop = False Frame.DrawBottom = False Frame.DrawLeft = False Frame.DrawRight = False Size.Values = ( 44.979166666666700000 42.333333333333300000 21.166666666666700000 111.125000000000000000) Alignment = taLeftJustify AlignToBand = False AutoSize = True AutoStretch = False Color = clWhite DataSet = ADODataSet1 DataField = 'facislo' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False Transparent = False WordWrap = True FontSize = 10 end object QRLabel5: TQRLabel Left = 16 Top = 40 Width = 46 Height = 17 Frame.Color = clBlack Frame.DrawTop = False Frame.DrawBottom = False Frame.DrawLeft = False Frame.DrawRight = False Size.Values = ( 44.979166666666700000 42.333333333333300000 105.833333333333000000 121.708333333333000000) Alignment = taLeftJustify AlignToBand = False AutoSize = True AutoStretch = False Caption = '��stka:' Color = clWhite Transparent = False WordWrap = True FontSize = 10 end object QRLabel7: TQRLabel Left = 336 Top = 40 Width = 45 Height = 17 Frame.Color = clBlack Frame.DrawTop = False Frame.DrawBottom = False Frame.DrawLeft = False Frame.DrawRight = False Size.Values = ( 44.979166666666700000 889.000000000000000000 105.833333333333000000 119.062500000000000000) Alignment = taLeftJustify AlignToBand = False AutoSize = True AutoStretch = False Caption = 'Podpis:' Color = clWhite Transparent = False WordWrap = True FontSize = 10 end object QRDBText3: TQRDBText Left = 72 Top = 40 Width = 57 Height = 17 Frame.Color = clBlack Frame.DrawTop = False Frame.DrawBottom = False Frame.DrawLeft = False Frame.DrawRight = False Size.Values = ( 44.979166666666700000 190.500000000000000000 105.833333333333000000 150.812500000000000000) Alignment = taLeftJustify AlignToBand = False AutoSize = True AutoStretch = False Color = clWhite DataSet = ADODataSet1 DataField = 'kccelkem' Mask = '# ###.00 K�' Transparent = False WordWrap = True FontSize = 10 end object QRDBText4: TQRDBText Left = 152 Top = 8 Width = 161 Height = 17 Frame.Color = clBlack Frame.DrawTop = False Frame.DrawBottom = False Frame.DrawLeft = False Frame.DrawRight = False Size.Values = ( 44.979166666666700000 402.166666666667000000 21.166666666666700000 425.979166666667000000) Alignment = taLeftJustify AlignToBand = False AutoSize = False AutoStretch = False Color = clWhite DataSet = ADODataSet1 DataField = 'firma' Transparent = False WordWrap = True FontSize = 10 end object QRDBText5: TQRDBText Left = 320 Top = 8 Width = 161 Height = 17 Frame.Color = clBlack Frame.DrawTop = False Frame.DrawBottom = False Frame.DrawLeft = False Frame.DrawRight = False Size.Values = ( 44.979166666666700000 846.666666666667000000 21.166666666666700000 425.979166666667000000) Alignment = taLeftJustify AlignToBand = False AutoSize = False AutoStretch = False Color = clWhite DataSet = ADODataSet1 DataField = 'ulice' Transparent = False WordWrap = True FontSize = 10 end object QRDBText6: TQRDBText Left = 496 Top = 8 Width = 217 Height = 17 Frame.Color = clBlack Frame.DrawTop = False Frame.DrawBottom = False Frame.DrawLeft = False Frame.DrawRight = False Size.Values = ( 44.979166666666700000 1312.333333333330000000 21.166666666666700000 574.145833333333000000) Alignment = taLeftJustify AlignToBand = False AutoSize = False AutoStretch = False Color = clWhite DataSet = ADODataSet1 DataField = 'mesto' Transparent = False WordWrap = True FontSize = 10 end end object T1: TQRLabel Left = 120 Top = 16 Width = 8 Height = 17 Frame.Color = clBlack Frame.DrawTop = False Frame.DrawBottom = False Frame.DrawLeft = False Frame.DrawRight = False Size.Values = ( 44.979166666666700000 317.500000000000000000 42.333333333333300000 21.166666666666700000) Alignment = taLeftJustify AlignToBand = False AutoSize = True AutoStretch = False Caption = '0' Color = clWhite Transparent = False WordWrap = True FontSize = 10 end object T2: TQRLabel Left = 160 Top = 16 Width = 8 Height = 17 Frame.Color = clBlack Frame.DrawTop = False Frame.DrawBottom = False Frame.DrawLeft = False Frame.DrawRight = False Size.Values = ( 44.979166666666700000 423.333333333333000000 42.333333333333300000 21.166666666666700000) Alignment = taLeftJustify AlignToBand = False AutoSize = True AutoStretch = False Caption = '0' Color = clWhite Transparent = False WordWrap = True FontSize = 10 end object T3: TQRLabel Left = 200 Top = 16 Width = 15 Height = 17 Frame.Color = clBlack Frame.DrawTop = False Frame.DrawBottom = False Frame.DrawLeft = False Frame.DrawRight = False Size.Values = ( 44.979166666666700000 529.166666666667000000 42.333333333333300000 39.687500000000000000) Alignment = taLeftJustify AlignToBand = False AutoSize = True AutoStretch = False Caption = '31' Color = clWhite Transparent = False WordWrap = True FontSize = 10 end object NTS: TQRLabel Left = 232 Top = 16 Width = 106 Height = 17 Frame.Color = clBlack Frame.DrawTop = False Frame.DrawBottom = False Frame.DrawLeft = False Frame.DrawRight = False Size.Values = ( 44.979166666666700000 613.833333333333000000 42.333333333333300000 280.458333333333000000) Alignment = taLeftJustify AlignToBand = False AutoSize = True AutoStretch = False Caption = 'Inkasov�no hotov�' Color = clWhite Transparent = False WordWrap = True FontSize = 10 end object idVerze: TQRLabel Left = 360 Top = 16 Width = 8 Height = 17 Frame.Color = clBlack Frame.DrawTop = False Frame.DrawBottom = False Frame.DrawLeft = False Frame.DrawRight = False Size.Values = ( 44.979166666666700000 952.500000000000000000 42.333333333333300000 21.166666666666700000) Alignment = taLeftJustify AlignToBand = False AutoSize = True AutoStretch = False Caption = '0' Color = clWhite Transparent = False WordWrap = True FontSize = 10 end object Agenda: TQRLabel Left = 408 Top = 16 Width = 8 Height = 17 Frame.Color = clBlack Frame.DrawTop = False Frame.DrawBottom = False Frame.DrawLeft = False Frame.DrawRight = False Size.Values = ( 44.979166666666700000 1079.500000000000000000 42.333333333333300000 21.166666666666700000) Alignment = taLeftJustify AlignToBand = False AutoSize = True AutoStretch = False Caption = '4' Color = clWhite Transparent = False WordWrap = True FontSize = 10 end end object ADODataSet1: TADODataSet CursorType = ctStatic CommandText = 'SELECT rozvoz.klic AS rozvozklic, rozvoz.nazev AS jmenorozvozu,' + ' roztrasy.klic AS roztrasyklic, roztrasy.name AS naz_trasy, '#13#10#13#10 + 'roztrasy.car AS car, roztrasy.mistood AS mistood, roztrasy.misto' + 'do AS mistodo, roztrasy.driver AS driver, roztrasy.m AS metru, '#13 + #10#13#10'roztrasy.time1 AS casnatrase, roztrasy.timeodjezdu AS casodje' + 'zdu, roztrasy.g AS gramy, roztrasy.carg AS carg, roztrasy.objem ' + 'AS '#13#10#13#10'objem, roztrasy.zdrzeni AS zdrzeni, rozstop.klic AS rozst' + 'opklic, rozstop.cislo AS facislo, rozstop.idrozvoz,rozstop.idadf' + ', '#13#10#13#10'rozstop.firma, rozstop.name AS mesto, rozstop.ulice, rozst' + 'op.idtrasa, rozstop.kccelkem, rozstop.zplatby FROM rozvoz, roztr' + 'asy, rozstop WHERE (rozvoz.klic = 8) '#13#10#13#10'AND (roztrasy.idrozvoz ' + '= rozvoz.klic) AND (roztrasy.klic = rozstop.idtrasa) AND (rozsto' + 'p.zplatby = 0) ORDER BY '#13#10#13#10'roztrasy.klic, rozstop.klic' Parameters = <> Left = 64 Top = 16 end end